home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / CCTX0297.ZIP / PMUPDT17.ZIP / DKME10UP.ZIP / DKME-GEN.ASM next >
Assembly Source File  |  1995-02-19  |  2KB  |  77 lines
  1. CODE            SEGMENT
  2.                 ASSUME  CS:CODE,DS:CODE,ES:CODE,SS:CODE
  3.                 EXTRN   DKME:NEAR,DKME_END:NEAR
  4.                 ORG     0100h
  5. START:
  6.                 MOV     AH,09h
  7.                 MOV     DX,OFFSET MSG
  8.                 INT     21h
  9.  
  10.                 MOV     CX,50
  11. LOOP_POINT1:
  12.                 PUSH    CX
  13.  
  14.                 MOV     AH,3Ch
  15.                 XOR     CX,CX
  16.                 MOV     DX,OFFSET FILE_NAME
  17.                 INT     21h
  18.                 XCHG    BX,AX
  19.  
  20.                 MOV     AX,OFFSET DKME_END+000Fh
  21.                 MOV     CL,04h
  22.                 SHR     AX,CL
  23.                 MOV     CX,CS
  24.                 ADD     AX,CX
  25.                 MOV     ES,AX
  26.  
  27.                 PUSH    BX
  28.                 MOV     BX,0100h
  29.                 MOV     CX,OFFSET MY_PROG_END-OFFSET MY_PROG_START
  30.                 MOV     DX,OFFSET MY_PROG_START
  31.                 CALL    DKME
  32.                 POP     BX
  33.  
  34.                 MOV     AH,40h
  35.                 INT     21h
  36.  
  37.                 PUSH    CS
  38.                 POP     DS
  39.                 PUSH    CS
  40.                 POP     ES
  41.  
  42.                 MOV     AH,3Eh
  43.                 INT     21h
  44.  
  45.                 MOV     BX,OFFSET FILE_NUM
  46.                 INC     BYTE PTR [BX+01h]
  47.                 CMP     BYTE PTR [BX+01h],"9"
  48.                 JBE     DKMEGEN_CON1
  49.                 MOV     BYTE PTR [BX+01h],"0"
  50.                 INC     BYTE PTR [BX]
  51. DKMEGEN_CON1:
  52.                 POP     CX
  53.  
  54.                 LOOP    LOOP_POINT1
  55.  
  56.                 MOV     AX,4C00h
  57.                 INT     21h
  58.  
  59. MSG             DB      "Working... (50)",0Dh,0Ah,"$"
  60.  
  61. FILE_NAME       DB      "DKME"
  62. FILE_NUM        DB      "00.COM",00h
  63.  
  64. MY_PROG_START:
  65.                 CALL    NEXT1
  66. NEXT1:
  67.                 POP     DX
  68.                 ADD     DX,000Ah
  69.                 MOV     AH,09h
  70.                 INT     21h
  71.                 INT     20h
  72.                 DB      "This is DKME test file",0Dh,0Ah,"$"
  73. MY_PROG_END:
  74.  
  75. CODE            ENDS
  76.                 END     START
  77.